home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1996 #15 / Monster Media Number 15 (Monster Media)(July 1996).ISO / prog_d / qrep10b.zip / QRLABELS.PAS < prev    next >
Pascal/Delphi Source File  |  1996-04-10  |  1KB  |  48 lines
  1. unit QRLABELS;
  2. {
  3.  QuickReport Mailing Labels template
  4.  - Connect the TTable to a database table
  5.  - Connect the QRDBText components to the datafields
  6.  - Set number of columns with the QuickReport.Columns property (default=3)
  7.  - Adjust the initial vertical positioning with the height of the page
  8.    header band
  9.  - Adjust the vertical spacing with the height of the Detail band
  10.  - Adjust the initial horizontal positioning with the QuickReport.LeftMargin
  11.    property
  12.  - Adjust the horizontal spacing with the QuickReport.ColumnMarginMM or
  13.    ColumnMarginInches properties
  14. }
  15.  
  16. interface
  17.  
  18. uses
  19.   Wintypes,winprocs, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  20.   Quickrep, StdCtrls, ExtCtrls, DB, DBTables;
  21.  
  22. type
  23.   TQRLabelsTemplate = class(TForm)
  24.     QuickReport: TQuickReport;
  25.     PageHeader: TQRBand;
  26.     Detail: TQRBand;
  27.     QRLabel1: TQRLabel;
  28.     NameField: TQRDBText;
  29.     AddressField1: TQRDBText;
  30.     AddressField2: TQRDBText;
  31.     AddressField3: TQRDBText;
  32.     Table1: TTable;
  33.     DataSource1: TDataSource;
  34.   private
  35.     { Private declarations }
  36.   public
  37.     { Public declarations }
  38.   end;
  39.  
  40. var
  41.   QRLabelsTemplate: TQRLabelsTemplate;
  42.  
  43. implementation
  44.  
  45. {$R *.DFM}
  46.  
  47. end.
  48.